home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1988 September / Ahoy_Magazine_88-09_1988_Double_L.d64 / Screen Flash (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  305b  |  8 lines
  1. 5 ck=0
  2. 10 for b=49152 to 49208:read a:ck=ck+a:pokeb,a:next
  3. 12 if ck<>6273 then print"error in data":end
  4. 14 sys 49152
  5. 16 data 169,1,141,5,220,160,0,173,162,0,153,0,4,153,0,5,153,0,6,153,0,7,200,208
  6. 18 data 238,160,0,173,162,0,153,0,216,153,0,217,153,0,218,153,0,219,200,208,238
  7. 20 data 169,0,141,33,208,141,32,208,76,0,192,139
  8.